package com.tanhua.dubbo.server.api;

import cn.hutool.core.collection.CollUtil;
import cn.hutool.core.convert.Convert;
import cn.hutool.core.util.ObjectUtil;
import cn.hutool.core.util.PageUtil;
import cn.hutool.core.util.StrUtil;
import com.alibaba.dubbo.config.annotation.Service;
import com.tanhua.dubbo.server.enums.CommentType;
import com.tanhua.dubbo.server.enums.IdType;
import com.tanhua.dubbo.server.pojo.*;
import com.tanhua.dubbo.server.service.IdService;
import com.tanhua.dubbo.server.service.TimeLineService;
import com.tanhua.dubbo.server.vo.PageInfo;
import lombok.extern.slf4j.Slf4j;

import org.bson.types.ObjectId;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.data.domain.PageRequest;
import org.springframework.data.domain.Pageable;
import org.springframework.data.domain.Sort;
import org.springframework.data.mongodb.core.MongoTemplate;
import org.springframework.data.mongodb.core.query.Criteria;
import org.springframework.data.mongodb.core.query.Query;
import org.springframework.data.redis.core.RedisTemplate;

import java.util.ArrayList;
import java.util.List;


/**
 * 圈子实现类
 */
@Service(version = "1.0.0")
@Slf4j
public class QuanZiApiImpl implements QuanZiApi {
    @Autowired
    private MongoTemplate mongoTemplate;
    @Autowired
    private IdService idService;
    @Autowired
    private TimeLineService timeLineService;
    @Autowired
    private RedisTemplate<String, String> redisTemplate;
    @Autowired
    private VideoApi videoApi;
    // 评论数据存储在Redis中key的前缀
    private static final String COMMENT_REDIS_KEY_PREFIX = "QUANZI_COMMENT_";
    // 用户是否点赞的前缀
    private static final String COMMENT_USER_LIKE_REDIS_KEY_PREFIX = "USER_LIKE_";
    // 用户是否喜欢的前缀
    private static final String COMMENT_USER_LOVE_REDIS_KEY_PREFIX = "USER_LOVE_";


    /**
     * 查询好友动态
     *
     * @param userId   用户id
     * @param page     当前页
     * @param pageSize 页大小
     * @return 好友动态集合
     */
    @Override
    public PageInfo<Publish> queryBuddyPublishList(Long userId, Integer page, Integer pageSize) {
        /*
         * >>>分析：查询好友的动态，实际上查询时间线表(quanzi_time_line_{userId})<<<
         * */
        PageInfo<Publish> pageInfo = new PageInfo<>();
        pageInfo.setPageNum(page);
        pageInfo.setPageSize(pageSize);

        /* 一、根据用户id，查询对应的时间线表 */
        // 创建查询条件
        // 根据传入分页参数，进行分页查询，并且按照动态发布时间降序排序
        Pageable pageable = PageRequest.of(page - 1, pageSize, Sort.by(Sort.Order.desc("date")));
        Query query = new Query().with(pageable);

        List<TimeLine> timeLineList = this.mongoTemplate.find(query, TimeLine.class, "quanzi_time_line_" + userId);
        if (CollUtil.isEmpty(timeLineList)) {
            // 没有查询到数据
            return pageInfo;
        }


        /* 二、通过时间线表获取好友动态id列表 */
        // 获取时间线列表中的好友发布id的列表
        List<Object> buddyPublishIdList = CollUtil.getFieldValues(timeLineList, "publishId");


        /* 三、根据好友动态id集合，查询好友发布动态 */
        // 创建查询条件
        // 根据好友动态id集合查询动态列表，并且按照动态发布时间降序排序
        Query queryPublish = Query.query(Criteria.where("id").in(buddyPublishIdList))
                .with(Sort.by(Sort.Order.desc("created")));

        List<Publish> publishes = this.mongoTemplate.find(queryPublish, Publish.class);

        /* 四、封装数据并返回 */
        pageInfo.setRecords(publishes);
        return pageInfo;
    }

    /**
     * 发布动态
     *
     * @param publish
     * @return 发布成功返回动态id
     */
    @Override
    public String savePublish(Publish publish) {
        /*
         * 分析：
         * 一、写入发布表
         * 二、写入相册表
         * 三、写入时间线表（异步）
         * */

        /* 一、写入发布表 */
        // 对publish对象校验
        if (!(ObjectUtil.isAllNotEmpty(publish))) {
            // 发布失败
            return null;
        }

        try {
            publish.setId(ObjectId.get()); // 设置主键id
            publish.setPid(this.idService.createId(IdType.PUBLISH)); // 设置自增长pid
            publish.setCreated(System.currentTimeMillis()); // 设置创建时间

            // 写入到publish表中
            this.mongoTemplate.save(publish);


            /* 二、写入相册表 */
            Album album = new Album();
            album.setId(ObjectId.get()); // 主键id
            album.setPublishId(publish.getId()); // 发布动态id
            album.setCreated(publish.getCreated()); // 发布时间

            // 写入到相册表中
            this.mongoTemplate.save(album, "quanzi_album_" + publish.getUserId());


            /* 三、写入时间线表（异步） */
            this.timeLineService.saveTimeLine(publish.getUserId(), publish.getId(), publish.getCreated());
        } catch (Exception e) {
            //TODO 需要做事务的回滚，Mongodb的单节点服务，不⽀持事务，对于回滚我们暂时不实现了
            log.error("发布动态失败~ publish = " + publish, e);
        }


        return publish.getId().toHexString();
    }


    /**
     * 查询推荐动态
     *
     * @param userId   用户id
     * @param page     当前页
     * @param pageSize 页大小
     * @return 好友动态集合
     */
    public PageInfo<Publish> queryRecommendPublishList(Long userId, Integer page, Integer pageSize) {
        /* 分析：通过redis中根据用户userId，给出的推荐发布pid查询推荐动态 */

        PageInfo<Publish> pageInfo = new PageInfo<>();
        pageInfo.setPageNum(page);
        pageInfo.setPageSize(pageSize);

        /* 一、查询redis中推荐发布pid */
        // 1 创建redisKey，用于查询推荐id
        String redisKey = "QUANZI_PUBLISH_RECOMMEND_" + userId;

        // 2 获取推荐发布pid
        String recommendPublishIdStr = this.redisTemplate.opsForValue().get(redisKey);
        if (StrUtil.isEmpty(recommendPublishIdStr)) {
            // 没有查询到推荐动态id
            return pageInfo;
        }

        // 3 分割字符串，获取每一个推荐发布pid
        String[] recommendPublishIdArr = StrUtil.splitToArray(recommendPublishIdStr, ",");

        /* 二、查询推荐动态 */
        // 1 计算分页
        int[] startEnd = PageUtil.transToStartEnd(page - 1, pageSize);
        int startIndex = startEnd[0];
        int endIndex = Math.min(startEnd[1], recommendPublishIdArr.length);

        // 2 获取要查询的发布pid
        List<Long> recommendPublishIdList = new ArrayList<>();
        for (int i = startIndex; i < endIndex; i++) {
            recommendPublishIdList.add(Long.valueOf(recommendPublishIdArr[i]));
        }

        // 健壮性判断
        if (CollUtil.isEmpty(recommendPublishIdList)) {
            //没有查询到数据i
            return pageInfo;
        }

        // 3 根据推荐发布pid集合查询推荐动态
        // 查询条件：根据发布pid查询，并根据据动态创建时间，倒序排序
        Query query = Query.query(Criteria.where("pid").in(recommendPublishIdList))
                .with(Sort.by(Sort.Order.desc("created")));
        List<Publish> publishList = this.mongoTemplate.find(query, Publish.class);

        // 健壮性判断
        if (CollUtil.isEmpty(publishList)) {
            //没有查询到数据
            return pageInfo;
        }

        /* 三、封装数据并返回 */
        pageInfo.setRecords(publishList);
        return pageInfo;
    }


    /**
     * 点赞 或者 喜欢
     *
     * @param userId      用户id
     * @param publishId   动态id
     * @param commentType 评论类型
     * @return 操作是否成功
     */
    public Boolean likeOrLoveComment(Long userId, String publishId, CommentType commentType) {
        // 判断用户是否已经点赞/喜欢，如果有直接返回
        if (this.queryUserIsLikeOrLove(userId, publishId, commentType)) {
            // 已经操作了
            return false;
        }

        // 保存Comment数据
        Boolean result = this.saveComment(userId, publishId, commentType, null);
        if (!result) {
            // 没保存成功，返回false
            return false;
        }

        // 修改redis中的点赞/喜欢数,以及是否点赞/喜欢

        // 修改点赞/喜欢数
        String redisKey = this.getCommentRedisKeyPrefix(publishId);
        String hashKey = commentType.toString();
        this.redisTemplate.opsForHash().increment(redisKey, hashKey, 1);

        // 用户是否点赞/喜欢
        String userHashKey = this.getCommentUserLikeOrLoveRedisKey(commentType, userId);
        this.redisTemplate.opsForHash().put(redisKey, userHashKey, "1");

        return true;
    }


    /**
     * 取消点赞 或者 取消喜欢
     *
     * @param userId      用户id
     * @param publishId   动态id
     * @param commentType 评论类型
     * @return 操作是否成功
     */
    public Boolean disLikeOrLoveComment(Long userId, String publishId, CommentType commentType) {
        // 判断用户是否已经点赞/喜欢，如果没有直接返回
        if (!this.queryUserIsLikeOrLove(userId, publishId, commentType)) {
            return false;
        }

        // 删除Comment数据
        Boolean result = this.removeComment(userId, publishId, commentType);
        if (!result) {
            return false;
        }

        // 修改Redis中的数据

        // 修改点赞/喜欢数
        String redisKey = this.getCommentRedisKeyPrefix(publishId);
        String hashKey = commentType.toString();
        this.redisTemplate.opsForHash().increment(redisKey, hashKey, -1);

        // 用户是否点赞/喜欢
        String userHashKey = this.getCommentUserLikeOrLoveRedisKey(commentType, userId);
        this.redisTemplate.opsForHash().delete(redisKey, userHashKey);

        return true;
    }


    /**
     * 查询 点赞数 获取 喜欢数
     *
     * @param publishId   动态id
     * @param commentType 评论类型
     * @return 数量
     */
    public Long queryLikeOrLoveCount(String publishId, CommentType commentType) {
        // 从Redis中命中查询，如果命中直接返回即可
        String redisKey = this.getCommentRedisKeyPrefix(publishId);
        String hashKey = commentType.toString();

        Object data = this.redisTemplate.opsForHash().get(redisKey, hashKey);
        if (ObjectUtil.isNotEmpty(data)) {
            return Convert.toLong(data);
        }

        // 查询Mongodb
        Long count = this.queryCommentCount(publishId, commentType);

        // 写入Redis
        this.redisTemplate.opsForHash().put(redisKey, hashKey, String.valueOf(count));

        return count;
    }


    /**
     * 查询⽤户是否点赞 或者 喜欢该动态
     *
     * @param userId      用户id
     * @param publishId   动态id
     * @param commentType 评论类型
     * @return 用户是否操作
     */
    public Boolean queryUserIsLikeOrLove(Long userId, String publishId, CommentType commentType) {
        /* 分析：先从redis中获取数据并判断，没有再去mongodb中确定结果 */
        /* 一、在redis中查询，并根据结果判断用户是否操作 */
        // 1 从redis中查询数据
        String redisKey = this.getCommentRedisKeyPrefix(publishId);
        String userHashKey = this.getCommentUserLikeOrLoveRedisKey(commentType, userId);
        Object data = this.redisTemplate.opsForHash().get(redisKey, userHashKey);

        // 2 判断数据是否为空
        if (ObjectUtil.isNotEmpty(data)) {
            // 判断标记符，返回结果
            return StrUtil.equals(StrUtil.toString(data), "1");
        }

        /* 二、在mongodb中查询，并根据结果判断用户是否操作 */
        Query query = Query.query(Criteria.where("publishId").is(new ObjectId(publishId))
                .and("userId").is(userHashKey)
                .and("commentType").is(commentType.getType())
        );
        long count = this.mongoTemplate.count(query, Comment.class);
        if (count == 0) {
            // 没有操作
            return false;
        }

        /* 三、因redis没有数据，所以将mongodb中的数据存到redis中 */
        this.redisTemplate.opsForHash().put(redisKey, userHashKey, "1");

        return true;
    }


    /**
     * 保存Comment
     *
     * @param userId      评论人id
     * @param publishId   发布id
     * @param commentType 评论类型
     * @param content     评论内容
     * @return 是否保存成功
     */
    private Boolean saveComment(Long userId, String publishId, CommentType commentType, String content) {
        try {
            // 创建Comment评论表对象
            Comment comment = new Comment();

            // 为评论对象添加数据
            comment.setId(ObjectId.get()); // 主键id
            comment.setPublishId(new ObjectId(publishId)); // 发布id
            comment.setCommentType(commentType.getType()); // 评论类型
            comment.setContent(content); // 评论内容
            comment.setUserId(userId); // 评论人id
            comment.setCreated(System.currentTimeMillis()); // 发表时间

            // 查询动态
            Publish publish = this.queryPublishById(publishId);
            if (ObjectUtil.isNotEmpty(publish)) {
                comment.setPublishUserId(publish.getUserId()); // 发布动态用户id
            } else {
                // 查询评论
                Comment myComment = this.queryCommentById(publishId);
                if (ObjectUtil.isNotEmpty(myComment)) {
                    comment.setPublishUserId(myComment.getUserId()); // 发布动态用户id
                } else {
                    // 查询小视频
                    Video video = this.queryVideoById(publishId);
                    if (ObjectUtil.isNotEmpty(video)) {
                        comment.setPublishUserId(video.getUserId()); // 发布动态用户id
                    } else {
                        // 这种情况不存在，直接返回false
                        return false;
                    }
                }
            }
            // 保存Comment
            this.mongoTemplate.save(comment);

            return true;
        } catch (Exception e) {
            log.error("保存Comment储存 userId = " + userId + ", publishId = " + publishId + " , commentType = " + commentType, e);
        }
        return false;
    }

    /**
     * 删除Comment数据
     *
     * @param userId      用户id
     * @param publishId   动态id
     * @param commentType 评论类型
     * @return
     */
    private Boolean removeComment(Long userId, String publishId, CommentType commentType) {
        Query query = Query.query(Criteria.where("publishId").is(new ObjectId(publishId))
                .and("userId").is(userId)
                .and("commentType").is(commentType.getType()));

        return this.mongoTemplate.remove(query, Comment.class).getDeletedCount() > 0;
    }

    /**
     * 获取评论用户userHashKey
     *
     * @param commentType 评论类型
     * @return 评论用户userHashKey
     */
    private String getCommentUserLikeOrLoveRedisKey(CommentType commentType, Long userId) {
        String userHashKey = null;
        switch (commentType) {
            case LIKE:
                // 点赞
                userHashKey = COMMENT_USER_LIKE_REDIS_KEY_PREFIX + userId;
                break;
            case LOVE:
                // 喜欢
                userHashKey = COMMENT_USER_LOVE_REDIS_KEY_PREFIX + userId;
                break;
            default:
                log.error("获取评论用户RedisKey", new RuntimeException());
        }

        return userHashKey;
    }

    /**
     * @param publishId   动态id
     * @param commentType 评论类型
     * @return 评论数
     */
    @Override
    public Long queryCommentCount(String publishId, CommentType commentType) {
        Query query = Query.query(Criteria.where("publishId").is(new ObjectId(publishId))
                .and("commentType").is(commentType.getType())
        );

        return this.mongoTemplate.count(query, Comment.class);
    }

    /**
     * 评论数据存储在Redis中key的前缀
     *
     * @param publishId 动态id
     * @return
     */
    private String getCommentRedisKeyPrefix(String publishId) {
        return COMMENT_REDIS_KEY_PREFIX + publishId;
    }


    /**
     * 根据id查询动态（单条）
     *
     * @param publishId 动态id
     * @return 单条动态
     */
    public Publish queryPublishById(String publishId) {
        return this.mongoTemplate.findById(new ObjectId(publishId), Publish.class);
    }

    /**
     * 根据id查询Comment对象
     *
     * @param commentId 主键id
     * @return
     */
    public Comment queryCommentById(String commentId) {
        return this.mongoTemplate.findById(new ObjectId(commentId), Comment.class);
    }

    /**
     * 根据id查询Video对象
     *
     * @param videoId 主键id
     * @return
     */
    public Video queryVideoById(String videoId) {
        return this.mongoTemplate.findById(new ObjectId(videoId), Video.class);
    }


    /**
     * 查询评论
     *
     * @param publishId 动态id
     * @param page      当前页
     * @param pageSize  页大小
     * @return 评论信息
     */
    public PageInfo<Comment> queryCommentList(String publishId, Integer page, Integer pageSize) {
        PageInfo<Comment> pageInfo = new PageInfo<>();
        pageInfo.setPageNum(page);
        pageInfo.setPageSize(pageSize);

        // 构造查询条件
        PageRequest pageable = PageRequest.of(page - 1, pageSize, Sort.by(Sort.Order.asc("created")));

        Query query = Query.query(Criteria.where("publishId").is(new ObjectId(publishId)))
                .with(pageable);

        //查询评论列表
        List<Comment> commentList = this.mongoTemplate.find(query, Comment.class);

        pageInfo.setRecords(commentList);

        return pageInfo;
    }

    /**
     * 发表评论
     *
     * @param userId    用户id
     * @param publishId 动态id
     * @param content   评论文本
     * @return 是否发表成功
     */
    public Boolean saveComment(Long userId, String publishId, String content) {
        return saveComment(userId, publishId, CommentType.COMMENT, content);
    }


    /**
     * 查询对我的点赞\喜欢\评论消息列表
     *
     * @param userId      用户id
     * @param commentType 评论类型
     * @param page        当前页
     * @param pageSize    页大小
     * @return
     */
    @Override
    public PageInfo<Comment> queryLikeOrLoveOrCommentListByUser(Long userId, CommentType commentType, Integer page, Integer pageSize) {
        PageInfo<Comment> pageInfo = new PageInfo<>();
        pageInfo.setPageNum(page);
        pageInfo.setPageSize(pageSize);

        PageRequest pageable = PageRequest.of(page - 1, pageSize, Sort.by(Sort.Order.desc("created")));
        Query query = new Query(Criteria.where("publishUserId").is(userId)
                .and("commentType").is(commentType.getType()))
                .with(pageable);

        List<Comment> commentList = this.mongoTemplate.find(query, Comment.class);

        pageInfo.setRecords(commentList);

        return pageInfo;
    }


    /**
     * 查询相册表
     *
     * @param userId   用户id
     * @param page     当前页
     * @param pageSize 页大小
     * @return
     */
    @Override
    public PageInfo<Publish> queryAlbumList(Long userId, Integer page, Integer pageSize) {
        PageInfo<Publish> pageInfo = new PageInfo<>();
        pageInfo.setPageNum(page);
        pageInfo.setPageSize(pageSize);

        // 先查询用户相册表
        PageRequest pageRequest = PageRequest.of(page - 1, pageSize,
                Sort.by(Sort.Order.desc("created")));
        Query queryAlbum = new Query().with(pageRequest);

        List<Album> albumList = this.mongoTemplate.find(queryAlbum, Album.class, "quanzi_album_" + userId);
        if (CollUtil.isEmpty(albumList)) {
            return pageInfo;
        }

        // 根据相册表查询对应的动态
        List<Object> publishIdList = CollUtil.getFieldValues(albumList, "publishId");

        Query queryPublish = Query.query(Criteria.where("id").in(publishIdList))
                .with(Sort.by(Sort.Order.desc("created")));
        List<Publish> publishList = this.mongoTemplate.find(queryPublish, Publish.class);

        pageInfo.setRecords(publishList);
        return pageInfo;
    }
}
